var a,b,c,d: TVec;
begin
CreateIt(a,b,c,d);
try
a.SetIt(False,[0,0,0,0,1,2,3,1,2,3]);
a.Split([b,c,d],[4,3,3]);
// b = [0,0,0,0], c = [1,2,3], d = [1,2,3]finally
FreeIt(a,b,c,d);
end;
end;
Copyright (c) 1999-2024 by Dew Research. All rights reserved.
